# By Brandon S. Allbery## Usage: $cwd = &getcwd;sub getcwd{	# The Mac implementation is trivial    `pwd`;}1;